(simula-match-string-or-comment): store-match-data => set-match-data.

diff --git a/lisp/progmodes/simula.el b/lisp/progmodes/simula.el
index 9ea3d52836cb04d4831ab6d5b030ce6d50d3e7bd..ec01c1e77db63ee1e002455ce64be53faf5dfcdd 100644 (file)
--- a/lisp/progmodes/simula.el
+++ b/lisp/progmodes/simula.el
@@ -1703,7 +1703,7 @@ If not nil and not t, move to limit of search and return nil."
         limit t)
     (when (match-beginning 3)
       ;; We've matched an end-comment.  Yuck.  Find the extent of it.
-      (store-match-data
+      (set-match-data
        (list (point)
        (if (re-search-forward "\\<\\(end\\|else\\|when\\|otherwise\\)\\>\\|;"
                               limit 'move)